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The  TRIDENT  Higher  Level  Language  (THLL)  is  a  procedure-oriented 
programming  lemguage  for  use  in  writing  software  programs  for  the  TRIDENT 
Digital  Control  Computer  (TDCC) .  This  computer  is  to  be  used  in  the 
Mk  98  FCS  and  the  Mk  88  Mod  fire  control  system  (PCS)  .  ^ 


The  purpose  of  this  docinnent  is  to  provide  a  complete  emd  rigorous 
syntactic  definition  of  THLL. 

This  technical  report  supersedes  NSWC/DL  TN-K-9/78,  dated  May  1978. 

Questions f  comments,  cuid  suggestions  regarding  the  material  pre¬ 
sented  herein  should  be  directed  to  the  Fire  Control  Programming  Branch, 
Support  Software  Group. 
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INTRODUCTION 


The  purpose  of  this  document  is  to  provide  a  ccxaplete  emd  rigorous 
syntactic  definition  of  the  TRIDENT  Higher  I^vel  Language  (THLL) .  Con¬ 
tractor  and  NSWC  personnel  who  work  with  THLL  are  provided  herein  with  a 
validation  tool  which  will  allow  a  quick  determination  of  a  program's 
syntactic  correctness.  The  TRIDENT  Higher  Level  Language  User's  Guide 
(NSWC  TR-3657  Revised  June  1978)  should  be  consulted  for  any  questions 
concerning  the  semantics  or  pragmatics  of  THLL  programming. 

The  gr£unmatical  definition  of  THLL  given  here  consists  of  a  set  of 
syntax  graphs  and  a  Backus-Naur  Form  (BNF)  description  (Appendix  A) . 

In  the  syntax  graphs,  a  distinction  is  made  between  terminal  and 
non-terminal  elements  by  representing  a  terminal  with  capital  letters  or 
special  characters  euid  enclosing  it  in  a  smooth ,  closed  curve : 


A  non-terminal,  corresponding  to  the  left-hand  side  of  a  BNF  production, 
is  represented  with  lower  case  letters  enclosed  by  a  rectangle: 


Identifier 


Correct  sequences  of  terminals  and  non-terminals ,  again  corresponding  to 
the  right-hand  side  of  a  BNF  production,  are  interconnected  with  arrows: 


'  V  • 


•tk  '» 


'Rie  BNF  description  of  THLL,  given  in  Appendix  A,  is  essentially  a  bottom- 
up  presentation  of  the  syntax.  Generally,  each  syntax  graph  corresponds 
to  a  set  of  BNF  productions.  A  BNF  production  consists  of  a  left-hand 
side  euid  a  right-hand  side  separated  by  the  symbol  '!  I .  The  BNF's  left- 
hand  side  is  always  a  non-terminal  of  the  grammar,  while  the  right-hand 
side  consists  of  a  set  of  alternations,  each  alternation  consisting  of  a 
sequence  of  grammar  symbols.  Non-terminals  are  represented  with  lower 
case  letters  enclosed  by  the  symbols  ' < '  and  ' > ' ,  and  terminals  2u:e 
represented  by  capital  letters  or  special  characters.  Alternations  in  a 
BNF  production  are  separated  by  the  backslash  character,  '  \' ,  for  example.- 

<return  stateraent>  !  1  =  RETURN  \  RETURN  <expression> 
which  corresponds  to  the  syntax  graph 
return  statement 


1  PFTITnM  ■ 

n 

expression 

J 


Because  a  particular  syntax  graph  may  correspond  to  several  BNF  productions, 
the  grammar  defined  by  the  syntax  graphs  has  fewer  non-terminal  elements 
than  the  BNF  greumar.  Thus,  the  syntax  graph  representation  of  the  THLL 
grammar  is  somewhat  coarser  than  the  BNF  representation.  For  example, 
the  precedence  of  arithmetic  and  logical  operators  is  not  reflected  in 
the  syntax  graphs. 

Much  of  the  explanatory  text  for  this  report  was  taken  from  the  THLL 
User's  Guide  (NSWC  TR-3657) . 
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SYNTAX  GRAPHS 


BASIC  SYMBOLS,  CONSTANTS  AND  IDENTIFIERS 

On  the  lowest  level,  a  THLL  program  is  a  character  string.  Charac¬ 
ters  are  grouped  together  as  items  which  fall  into  one  of  the  following 
categories: 

1 .  Operators 

2.  Delimiters 

3 .  Constants 

4 .  Symbols  (identifiers) 

There  is  a  fixed  nvunber  of  operators  emd  delimiters  ^md  these  are  listed 
in  Tables  2  amd  3. 

The  character  set  includes  the  English  letter  alphabet  (A-Z) ,  the 
numerals  (0-9) ,  a  single  space,  and  certain  special  characters  (see 
Table  1). 


Table  1.  Character  Set 


A 

B 

C 

D 

E 

F 

G 

H 

1 

J 

K 

L 

M 

N 

0 

P 

Q 

R 

S 

T 

U 

V 

W 

X 

Y 

Z 

0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

- 

+ 

* 

/ 

( 

) 

= 

» 

• 

: 

1 

* 

N 

$ 

1 

9 

< 

> 

% 

— 

s 

? 

9 

K 

\ 

E 

2 

Note:  Where  two  characters  appear,  the  upper  one  is  used  for  coding 
purposes  to  cause  the  lower  one  to  appear  on  the  TRIDENT  Digital  Control 
Computer  (TDCC)  output  devices. 
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Table  2.  THLL  Operators 


Class 

Mnemonic 

Meaning 

Arithmetic 

+ 

addition 

Arithmetic 

- 

subtraction 

Arithmetic 

* 

multiplication 

Arithmetic 

/ 

division 

Arithmetic 

** 

exponentiation 

Arithmetic 

MOD 

modulo 

Relational 

LES 

less  them 

Relational 

LEQ 

less  than  or  equal 

Relational 

EQL 

equal 

Relational 

CRT 

greater  than 

Relational 

GEQ 

greater  than  or  equal 

Relational 

NEC 

not  equal 

Logical 

OR 

or 

Logical 

XOR 

exclusive  or 

Logical 

AND 

and 

Logical 

NOT 

not 

Assignment 

= 

assignment  of  value 

Bit 

ANDB,  BITAND 

and  bits 

Bit 

ORB,  BITOR 

or  bits 

Bit 

XORB,  BITXOR 

exclusive  or  of  bits 

Bit 

NOTB,  BITNOT 

not  bits 

Addressing 

LOC 

LOC  X  is  the  virtual^  address  of  the 
word  containing  the  first  bit  of  X. 

Addressing 

LOCA 

LOCA  X  is  the  absolute  address  of 
the  word  containing  the  first  bit 
of  X. 

Addressing 

ENTRY? 

ENTRY?  X  is  the  virtual^  address  of 

the  beginning  of  procedure  X  and 
is  used  to  pass  the  procedure  as  a 
formal  parameter. 


^  Absolute  address  on  the  CDC  6700. 


Table  3.  Delimiters 


ALPHA 

ARITHMETIC 

ARRAY 

BEGIN 

CASE 

CASEEND 

COMEND 

COMMENT 

COMMON 

COMPONENT 

CPRINT 

DEFINE 

DEVICE 

DO 

DOUBLE 

ELSE 

END 

ENDCASE 
ENDCOM 
END  IF 
EXEC 
EXIT 

EXTERNAL 


FIEIX) 

FINIS 

FOR 

FORMAT 

GLOBAL 

GOTO 

HALF 

ICL 

IF 

IFEND 

INSERT 

INTEGER 

INTERRUPT 

KBDSS 

LINK 

LOGICAL 

LOOPEXIT 

MDF 

MTF 

NULL 

OFFSET 

OPTARG 

OWN 


$ 

POINTER 

PRESET 

PROCEDURE 

REAL 

REPEAT 

RETURN 

SPRINT 

STACK 

STEP 

SWITCH 

SYNONYM 

TASS 

THEN 

TO 

UNTIL 

VALUE 

WHILE 


( 

) 
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binary  dioit 


binary  digit 


m 

m 

m 

m 

g 

m 


octal  digit 


decimal  digit 


To  complete  the  representation  of  a  binary,  octal,  or  hexadecimal 
number,  the  integer  part  and  optional  scale  part  may  be  preceded  by  a 
minus  sign;  and  the  resulting  string  is  surrounded  by  quotation  marks  and 
prefixed  with  the  appropriate  character. 


binary  number 


octal  number 


hex  number 


A  decimal  number  consists  only  of  a  decimal  integer  followed  by  a 
scale  part. 


decimal  number 


Real  Numbers.  A  real  number  consists  of  a  decimal  floating  point 
number  followed  by  an  optional,  base  10  exponent. 

real  number 


boolean  constant 


Strings .  A  literal  character  string  is  denoted  by  a  '#'  followed 
by  a  character  sequence  flanked  by  identical  delimiting  characters.  The 
delimiting  character  can  be  any  of  the  THLL  characters  as  long  as  it  is 
not  contained  in  the  character  sequence  comprising  the  string.  The 
string  length  may  be  from  0  to  256  characters. 

string 


Identifiers 


A  THLL  identifier  is  a  user-defined  name  which  can  denote  a  com¬ 
ponent,  array,  stack,  device,  procedure,  format,  variable,  label,  or 
switch.  Although  an  identifier  may  be  represented  by  up  to  256  charac- 
acters,  only  the  first  eight  determine  its  uniqueness.  'Letter'  may  be 
any  of  the  26  alphabetic  characters. 

identifier 


component  id,  array  id,  stack  id,  device  id,  procedure  id, 
format  id,  variable  id,  label  id,  switch  id 


¥ 
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EXPRESSIONS 


An  eiqpression  is  a  rule  for  computing  a  new  value  from  existing 
values.  Expressions  are  built  from  constants,  variables,  function 
designators,  and  operators. 


Variables 

Veuriables  may  either  be  simple  or  subscripted.  An  array  may  have 
a  maximum  of  three  subscripts  and  a  component  may  have  a  maximum  of  two 

variable 


A  function  designator  is  the  application  of  a  procedure  to  a  fixed 
set  of  parameters,  resulting  in  a  value.  It  is  an  expression  and  must 
be  of  type  I,  D,  R,  or  P. 


Although  it  Is  syntactically  correct  to  use  a  loop  argument  any¬ 
where  in  a  function  parameter  list,  it  is  semantically  correct  to  use 
a  loop  argument  only  after  the  fifth  parameter  in  a  READ/VJRITE  statement. 

loop  argument 


In  Tables  4  and  5,  types  of  values  are  given  using  the  following 
abbreviations ; 

I  -  integer 
H  -  half 
D  -  double 
R  -  real 
P  -  pointer 
N  -  no  type 
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Table  4.  Numerical  Functions 


Fvinction  Name 

Type  of  Argument (s) 

Type  of  Value 

ABS 

(HIDR) 

1,  D,  R  correspondingly 

SIGN 

(HID) 

1,  D  (1  or  -1) 

(R) 

R  (1.  or  -1.) 

SQRT 

(HIDR) 

R 

SIN 

(HIDR) 

R 

COS 

(HIDR) 

R 

TAN 

(HIDR) 

R 

COT 

(HIDR) 

R 

ARCCOS 

(HIDR) 

R 

ARCSIN 

(HIDR) 

R 

ARCTAN 

(HIDR) 

R 

ARCCOT 

(HIDR) 

R 

LN 

(HIDR) 

R 

EXP 

(HIDR) 

R 

FLOAT 

(hid) 

R 

FLOAT 

(13'-’) 

R 

FIXH 

(R) 

I 

FIXl  I 

FIXD  (R)  D 


SHIPTA 


I,  D  corresponding  to 
argument  1 
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Table  4. 

Function  Name  Type 


Numerical  Functions 
of  Argument (s)  _ 


(Cont'd) 

Type  of  Value 


SHIFTL 


SHIFTR 


TEST. BIT 


CLR.BIT 


SET. BIT 


TGIi.BIT 


FIND. BIT 


I,  D  corresponding  to 
argument  1 


I,  D  corresponding  to 
argument  1 


I 


I 


I 


I 


I 


POCA 

(R,R,R,R) 

N 

CAPO 

(R,R,R,R) 

N 

ROAX 

(R,R,R,R,R) 

N 

ROTA 

(R,R,R,R,R) 

N 
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Table  5.  Miscellaneous  Functions 


Function  Name 


De  of  Argument 


LENGTH 

MLENGTH 

MOVEC 

CONC 

ORDERC 

PUSH 

POP 

STACKWC 

STACKSC 

BOUND 

SWA 


({*!•  (^1) 


(stack  id,  expression) 
(stack  id) 

(stack  id) 

(stack  id) 

(array  id,  I) 

(I) 


I 

I 

N 

N 

I 

N 

N 

1 

1 

I 

N 
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Constants,  variables,  function  designators,  conditional  expressions, 
case  expressions,  and  location  expressions  are  basic  elements  in  THLL. 
Simple  expressions  are  basic  elements  or  constructed  from  these  using 
the  bit,  arithmetic,  relation,  and  logical  operations. 


relational  operator 


arithmetic  expression 


N 


BITOR  ^4- 
L-C  ORB 


— ^  BITXOR  ^4- 

XORB  ^ - 1 
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Conditional  Expression.  A  conditional  expression  allows  the  evalu¬ 
ation  of  a  statement  or  expression  to  proceed  only  if  progreunmer-de fined 
conditions  have  been  met.  The  conditional  expression  becomes  a  conditional 
statement  if  the  common  type  of  all  THEN  expressions  euid  the  ELSE  expres¬ 
sion  is  of  type  statement. 


conditional  expression 


Case  Expression.  The  general  form  of  the  case  expression,  CASE  P  DO 
e^,  02,...,  Bn  ENDCASE,  allows  the  evaluation  of  one  of  a  set  of 
indexed  expressions.  The  expression,  P,  is  evaluated  to  an  integer  which 
serves  as  an  index  to  select  which  expression  e^^  will  be  done.  If  P 
produces  a  value  less  than  1  or  greater  than  n,  then  P  is  assigned  the 
value  n.  The  case  expression  becomes  a  case  statement  if  the  common 
type  of  all  DO  expressions  is  of  type  statement. 
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case  expression 


Assignment  Expression 

The  value  of  an  assignment  expression  is  the  value  of  the  right-side 
expression.  The  assignment  of  this  value  to  the  left-side  varicible  can 
be  considered  a  side  effect, 

assignment  expression 


variable 


STATEMENTS 

A  THLL  statement  is  a  program  unit  which  produces  an  effect  on  the 
environment . 


statement 


Ch£mge  of  Control  Statement 


Change  of  control  statements  transfer  control  to  a  designated  point 
in  the  program  or  return  control  from  a  called  procedure  to  the  point  of 
call. 

change  control  statement 


goto  statement 


exit  statement 


return  statement 


joto  statement 


label  id 


switch  id 


(  Hi  expression 


The  effect  of  an  exit  statement  is  to  transfer  control  to  the  end 
of  the  present  block  or  to  the  end  of  an  embracing  block  labeled  by  the 
indicated  lcd>el  identifier. 

exit  statement 


r"  _ “> 

1 

_J 

1aHo1  iA 

^  EiaX  X  j 

'  * 

:  n 

LOOPEXIT 


The  effect  of  a  return  statement  is  to  terminate  the  evaluation  of 
a  procedure  body  and  transfer  control  to  the  calling  procedure. 

return  statement 


■■■■■■I 

Proper  Statements 


proper  statement 


A  block  may  be  defined  as  a  sequence  of  zero  or  more  declarations 
followed  by  one  or  more  statements  or  expressions,  all  separated  by  semi¬ 
colons  and  embraced  by  BEGIN-END  brackets. 
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block  statement 


There  are  four  types  of  loop  staterents.  Each  type  used  the  reserved 
word  DO  followed  by  an  expression  or  a  proper  statement,  which  will  be 
evaluated  zero  or  more  times  according  to  conditions. 


27 


loop  statement 


null  statement 


DECLARATIONS 

The  primary  purpose  of  declarations  is  to  provide  information  to  the 
compiler  about  symbols  used  in  the  progrcun.  This  includes  data  types, 
array  cuid  stack  sizes,  I/O  formats,  procedures,  etc. 

There  are  two  categories :  data  and  procedure .  Every  identifier 
which  does  not  appear  as  a  label  must  be  declared.  A  procedure  declara¬ 
tion  defining  an  identifier  to  be  a  procedure  name  binds  it  to  the  pro¬ 
cedure  definition.  All  other  declarations  fall  into  the  data  category. 
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declaration 


Attributes .  Both  data  and  procedures  are  given  various  attributes 
upon  declaration.  These  attributes  define  type,  size,  and  allocation 
mode  in  the  case  of  data,  and  access  2uid  type  in  the  case  of  procedures 

type  attribute 


full  attribute 


attribute  head 


30 


Arrays  can  be  defined  as  having  one,  two,  or  three  dimensions. 


array  size 


integer 


integer 


integer 


The  lower  bound  for  any  dimension  is  always  0,  while  the  upper  bound  is 
defined  through  an  array  declaration.  An  externally  defined  array  can 
be  declared  with  either  its  proper  numerical  dimensional  bounds  or  with 
asterisks . 

external  size 


array  size 


Procedure  Declaration.  A  procedure  declaration  defines  an  identi¬ 
fier  to  be  the  neune  of  a  procedure.  The  main  part  of  a  procedure  is  the 
procedure  body  which  is  always  a  block  that  specifies  the  piece  of  code 
to  be  executed  when  the  procedure  is  invoked. 

rocedure  declaration 


procedure  head 


procedure  body 


procedure  body 


block  statement 


The  procedure  body  is  preceded  by  the  procedure  head  which  contains 

1.  Access  of  the  procedure 

2.  Type  of  the  value  of  the  procedure 

3.  Name  of  the  procedure 

4.  List  of  formal  parameters 

5.  Description  of  formal  parameters 
Items  1,  2,  4,  and  5  may  be  omitted. 


irocedure  head 


irocedure  head  2 


executive  head 


Every  formal  parameter  must  appear  in  the  specification  part. 
Those  parcimeters  which  are  to  be  transmitted  by  value  will  appear  in 
the  value  part  cind  the  specification  part.  The  specification  part 
will  follow  the  value  part,  if  there  is  one,  or  the  procedure  head, 
if  there  is  no  value  part. 

specification  part 


specification  element 


irocedure  specification 


If  the  formal  parameter  procedure  has  arguments,  they  must  be  de¬ 
scribed  in  order  of  occurrence  within  parentheses.  It  is  also  necessary 
to  indicate  the  transmission  mode  of  these  argtiments. 


argument  list 


Array  Declarations.  Array  declarations  provide  information  concern 
Ing  the  type,  name,  and  size  of  an  array,  as  well  as  indicating  its 
allocation  mode.  Array  subscripting  starts  with  zero.  For  exaunple,  an 
array  named  TAB  which  is  to  be  one-dimensional  and  contain  10  elements 
would  be  indicated  by  TAB (9).  Arrays  may  be  one-,  two-,  or  three-dimen¬ 
sional  with  the  maximum  size  of  each  dimension  being  specified  by  an 
integer  constant  in  the  declaration  statement. 

array  declaration 


Identifier 


array  attribute 


type  attribute 


full  attribute 


K. 


Type  Declarations.  Type  declarations  specify  variables  to  be  INTEGER, 
DOUBLE,  REAL,  or  POINTER.  The  variable  specified  by  an  identifier  can 
only  assume  values  of  the  declared  type  by  assignment  or  preset  declara¬ 
tion.  If  the  variable  receives  an  assigned  value,  automatic  type 
conversion  will  have  occurred. 


type  declaration 


Alpha  Declarations.  An  alpha  declaration  defines  an  identifier  to 
be  of  type  ALPHA.  The  maximum  length  of  any  string  that  can  be  stored 
is  specified  in  the  declaration.  If  more  than  one  string  is  declared 
in  the  same  declaration,  all  will  have  the  same  length  unless  indicated 
otherwise.  The  first  character  of  a  string  is  designated  as  the  zero 
character. 


alpha  declaration 


alpha  attribute 


Switch  Declarations.  The  identifier  following  the  reserved  word, 
SWITCH,  is  associated  with  a  sequence  of  labels  to  the  right  of  the 
assignment  operator.  A  positive  integer,  indicating  relative  position 
within  the  list  from  left  to  right,  is  associated  with  each  label 
identifier. 

If  "L" ,  an  identifier,  is  bound  to  a  switch  list  by  a  switch  decla¬ 
ration  then  the  value  of  the  address  expression  L{e)  is  the  nth  label 
in  the  switch  list  for  "L",  where  n  is  the  integer  value  of  e.  If  n  is 
less  than  1  or  n  is  greater  than  the  count  for  the  last  label,  then  n 
is  set  to  the  value  of  the  last  label. 

switch  declaration 


label  list 


.0 


External  Declarations.  An  external  declaration  does  not  define  an 
identifier,  it  equivalences  it  to  an  identifier  defined  outside  of  the 
program.  Sufficient  information  about  the  identifier,  its  type,  its 
dimensions  if  it  is  an  array,  its  arguments  if  it  is  a  procedure,  must 
be  given  to  allow  the  identifier  declared  EXTERN7VL  to  be  treated  properly 
by  the  compiler.  Component,  label,  and  switch  identifiers  cannot 
be  declared  EXTERNAL. 

external  declaration 


A 


external  variable  declaration 


r- 


EXTERNAL 


type 

attribute 


external  stack  grou] 


external  array  declaration 


Stack  Declarations.  Stack  declarations  provide  information  concern 
ing  the  type,  neune,  and  size  of  a  stack,  as  well  as  indicating  its 
allocation  mode. 
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stack  declaration 


Global  Declaration.  A  global  declaration  makes  an  identifier,  de 
fined  in  one  program,  known  to  a  separately  compiled  program. 


global  declaration 


/  \  .1 - 1 


Format  Declaration.  A  format  declaration  binds  an  identifier  to  a 
format  list  which  is  used  to  indicate  the  manner  of  converting  and  editing 
information  between  the  internal  representation  and  the  external  character 
string. 


format  declaration 


format  list 


format  element 


TASS  Declaration.  The  TASS  declaration  permits  the  programmer  to 
include  TASS  control  cards  as  a  part  of  the  THLL  source  text.  The  TASS 
declaration  can  appear  cinywhere  in  the  source  text  where  a  declaration 
can  appear.  Ideally,  it  should  appear  immediately  after  the  first  BEGIN. 
The  effect  of  the  TASS  declaration  is  to  treat  all  card  images,  beginning 
with  the  next  card  until  a  card  image  with  a  double  slash  (i.e.,  //)  in 
card  columns  1  and  2  is  encountered,  as  TASS  control. 

TASS  declaration 


INSERT  Declarations.  The  INSERT  declaration  permits  the  progrcimmer 
to  include  source  text  from  other  than  the  current  compiler  source.  The 
source  text  to  be  included  is  selected  from  a  data  set  referenced  by 
file  name  (first  identifier)  and  member  name  (second  identifier) . 

INSERT  declaration 


identifier 


identifier 


Component  Declarations.  By  using  components,  a  programmer  is  able 
to  access  parts  of  a  word.  Also,  a  specific  field  of  a  word  may  be 
written  into  by  using  a  component  as  the  left-side  variable  in  an  assign 
ment  expression. 


Component  declarations  come  in  two  forms.  One  form  allows  all 
component  characteristics  to  be  specified  for  one  symbol  in  a  single 
declaration,  while  the  other  form  allows  the  type  information,  the 
field  information,  and  the  offset  information  to  be  specified  for  a  list 
of  component  identifiers  by  separate  declarations. 


component  declaration  1 


component  declaration  2 


component  head 
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field  list 


component  list 


If  an  identifier  is  declared  to  be  a  comixjnent  according  to 
component  declaration  1,  and  the  component  field  is  a  proper  part  of  a 
word,  then  this  identifier  must  appear  in  all  three  lists;  the  component 
list,  tlie  offset  list,  and  the  field  list.  For  whole  word  and  double 
word  components  the  field  definition  may  be  omitted. 

Common  Declarations.  The  common  declaration  provides  a  mechanism 
for  defining  a  block  of  memory  for  OWN  data  such  that  only  the  origin  of 
this  block  is  a  global  symbol  and  that  various  parts  of  this  block  can 
be  referenced  symbolically.  The  common  body,  that  is,  the  portion  of  the 
common  declaration  following  the  keyword  COMMON,  should  not  contain  the 
keyword  OWN.  All  common  data  are  implied  to  be  OWN.  With  this  agreement, 
the  common  body  is  identical  in  the  GLOBAL  COMMON  definition  and  in  the 
EXTERNAL  COMMON  use. 

common  declaration 


)tC  COMMON  >1 


«rr«y 

declarfttion 


typ* 
daclaration, 


FNDCOM  >r 


declaration 


alpha 

daclaration 


>> 
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Preset  Declaration.  The  preset  declaration  is  used  to  initialize 
OWN  variables  at  compile  time.  Simple  and  subscripted  variables  may  be 
preset.  Subscripted  variables  using  a  stack  identifier  cannot  be  preset 

preset  declaration 


< 


preset  element 


L(^  BEGIN  end  ^ 


preset  element 


simple  expression  list 


Only  expressions  that  can  be  evaluated  at  compile  time  must  appear 
in  the  simple  expression  list. 
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Synonym  Declaration.  A  synonym  declaration  allows  a  THLL  program¬ 
mer  to  associate  a  segment  of  source  text  with  an  identifier.  When  dollar 
signs  ($)  are  used  to  delimit  a  synonym  definition,  the  synonym  defini¬ 
tion  may  not  contain  any  imbedded  dollar  signs. 


synonym  declaration 


A  THLL  item  is  a  constant,  an  identifier,  an  operator  or  a  delimiter. 
An  item  delimiter  is  a  THLL  item  that  is  not  a  constant  and  not  the  semi¬ 
colon.  The  right-end  item  delimiter  is  the  first  occurrence  of  the 
source  THLL  item  that  functions  as  the  left-end  item  delimiter. 
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ONF  GRAMMAR  FOR  1HU 


1.  BASIC  SrHOCLS,  CONSTANTS.  AND  lOFMTlFIERS 


1.1  CHARACTFPS 


1.  «LE  TTFR> !•=  A\B\C\0\E\F\G\H\I\ JVK\L\M\N\0\P\0\R\S\T\U\V\M\X\Y\r 

2.  <0IGIT>1!=  0\1\2\3\A\5\6\7\8\9 

3.  <SPFC1AL  CMARACTER>>  1=  tN’S/X  I \» \=  \ . \.  M\ J \» \”\S\ I \ 

•\<\>\X\.\  MVTSaNCXlWV- 

4.  <CHARACTER>!T=  <LETTeR»  \  «OIGIT>  \  cSPcCIAL  CHARACTEP> 


1.2  CONSTANTS 


b.  <CONSTANT>n=  <NUHnER>  \  «BOOLEAN  CONST ANT»  \  <STRIHG> 


t.2.1  NUMBERS 


6.  «NUMBER»M=  <INTEGER>  \  <REAL  NOMBE  R>  \  <SCALEO  REAl  NUM0ER> 


1. 2.1.1  INTEGERS 


r.  <binary  cigit>h=  o\i 

A.  <OCTAl  0IGIT>T»S  <6INARY  OIG  IT  >\2\3\4 \5  \6V7 

9.  <0'^CIPAI.  OIGII>!t=  <OCTAl  DIGIT>\8\9 

10.  <HEX  CIGII>!!=  OTECIMAL  0  IGI  T>  \  A\B\C\0\E\F 

11.  <nECINAL  INTEGCR»ff=  <OECIP4l  OIGIT»  \ 

<DeCIMAL  INTECER>  <DECIMAL  DIGIT* 

12.  <SCALF  PART>!!=  K  <OtCIMAL  INTEGER*  \  K*  cOECIMAl.  INTEGER*  \ 

K-  .DECIMAL  INTEGER* 

13.  .BINARY  INIEG'P*!!^  .BINARY  DIGIT*  \  ‘BINARY  INTEGER*  .BINARY  DIGIT* 

14.  .BINARY  NUMRfR*!!=  B*. OPTIONAL  -»  ‘BINARY  INTEGER*’  \ 

8'. optional  ->  ‘BINARY  INTEGER*  ‘SCALE  PART** 


■  • 


15.  <OCTSL  rNT£6ew>f»=  «OCraL  0I6IT>  \  *OCT*L  INTEGtR>  «CCT»L  DICIT» 
1^.  <OCTftl  NUMBFB>1I=  C*<OPTION*L  ->  <OCT»L  INTEGER*'  \ 

C*<0PT10NAL  ->  <OCTAL  INTEGER*  <SCALE  PART*' 

17.  <DFCINAL  NUMPER*n=  <OECIHAt  INTEGER*  \ 

<0'C1HAL  INTEGER*  <SCAtE  PART* 

IS.  «HEX  INTEGER*!1=  <HEX  DIGIT*  \  <MEX  INTEGER*  <HEX  DIGIT* 

19.  <HEX  NUMB‘^R*M=  X*<OPTIONAL  -*  <HEX  INTEGER*'  \ 

X'<OPTIONAL  -*  <MEX  INTEGER*  <SCALE  FART*' 

20.  <INTEGER*!!=  <BINARY  NUHBER*  \  <OCTAL  NUMBER*  \  <OfCIPAL  NUMBER*  V 

<HEX  NUMBER* 

1.2. 1.2  REAL  numbers 

21.  <EXPONENT*! !=  E  <OECIMAL  INTEGER*  \  E  *  <0EC1HAL  INTEGER*  \ 

E  -  «OECIMAL  INTEGER* 

22.  <FL0ATING  POINT  NUMBER*M=  <OECIMAU  INTEGER*  .  <OECIMAL  INTEGER*  \ 

<o£cimal  integer*  .  \ 

<OECIMSL  INTEGER* 

23.  <S'EAL  NUMBER*«I=  <FL0ATINC  POINT  NUMBER*  \ 

<floating  point  number*  cExPONENT* 

1.2.1.  3  SCALFO  real  NUMBER 

24.  «SCALEO  REAL  NUMBER*!  f=  <REAL  NUMBER*  <SCALE  PART* 

1.2.2  BOOLEAN  CONSTANTS 

26.  ^BOOLEAN  CONSTANT*!  !=  TRUE  \  FALSE 

1.2.3  STRING 

26.  <CMARACTeR  SECUENCE*!!=  <EMPTy*  \ 

<CHARACTER  SEQUENC""*  ^CHARACTER* 

27.  <nE  LIMITING  CM  AR  ACTF  R* !  !  =  ANY  CHARACTER  NOT  IN  THE  CHARACTER 

SE  OUENCE 


A-2 


28.  <SrRING>!l=  t<OELIHiriNe  CHARACTER>  <CHABACTER  SEOOEKCE* 

<OELIHITING  CHARACTER> 


1.3  lO'^NTIFIERS 

29.  <PERICOS»«!=  .  \  <PERIOOS>  . 

30.  <10ENTIFI'R>!!=  <LETfER>  \  <IOENTIFIER»  <LETTER>  \ 

<I0ENTIF1ER>  <DECIHAL  OIGIT>  \ 
<IOtNTIFIER>  <PERIODS>  <LETTER>  \ 
<IOENTIFIER>  <PERIODS>  <OeCIMAL  01GI3> 

31.  <COHPCNSNT  IO>«l=  <I0eMTlFlER> 

32.  <ARRAY  IO>1!=  <IOeNTIFIER> 

33.  <STACK  IO>»>=  <IOENlIFieR> 

34.  <nevlCE  IO>!!*  <IOENTIFIER> 

35.  <PROCfcOURt  IC>!»=  <IOENOIFlER» 

36.  <FORMAT  IO>!!=  <IOENTIFIER> 

37.  <tfARIA9LE  IO>>!=  <IOENTIFIER> 

38.  <L4HEL  !□>!!=  <IOENTIFIER» 

39.  <SMITrH  in>!!=  <IOEMTIFIFR> 
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2.  EXP'JFSSICNS 


<•0.  <tl(P^FS!5  ION>nr  <SIHPLE  FXPf^ESSIONv  \  <*SSIGNI1ENT  EXPRESSION* 

2.1  VARIAPLES 

Al.  <r,OMPCNEKT  HfAD*!1=  ‘COMPONENT  ID»  «  <F  XPRtSS  ION*  \ 

‘COHFONENT  HEAD*  ,  ‘EXPRESSION* 

42.  ‘COMPONENT  VARIABLE*!!^  ‘COMPONENT  HEAD*  ) 

43.  ‘ARRAY  HEAO*n=  ‘ARRAY  IQ*  I  ‘EXPRESSION*  \ 

‘ARRAY  HEAD*  ,  ‘EXPRESSION* 

44.  ‘SUBSCRIPTED  VARIA8L£»H=  ‘ARRAY  HEAD*  »  \ 

‘STACK  ID*  (  ‘EXPRESSION*  I 

45.  ‘VARIABLE*! »=  ‘VARIABLE  10*  N  ‘SUBSCRIPTED  VARIABLE*  \ 

‘COMPONENT  VARIABLE* 

2.2  function  0ESI6NAT0RS 

46.  ‘ACTUAL  PARAMETER*!!*  ‘EXPRESSION*  \  ‘ARRAY  10*  V  ‘STACK  10*  \ 

‘DEVICE  to*  \  ENTRYP  ‘PROCEDURE  10*  \ 

‘FORMAT  10*  \  ‘LOOP  ARGUMENT* 

47.  ‘PARAMETER  LIST*!!*  ‘ACTUAL  PARAMETER*  V 

‘PARAMETER  LIST*  ,  ‘ACTUAL  PARAMETER* 

48.  ‘LOOP  STEP  HEAO»!!=  FOR  ‘VARIABLE  10*  *  ‘EXPRESSION*  STEP 

‘EXPRESSION* 

4B.  ‘LOOP  REPEAT  HEA0*!!=  FOR  ‘VARIABLE  ID*  *  ‘EXPRESSICK*  REPEAT 

‘EXPRESSION* 

50.  ‘LOOP  ARGUMENT  TAIL*!!*  ‘EXPRESSION*  (  ‘PARAMETER  LIST*  > 

51.  ‘LOOP  ARGUMENT*!!*  HHILF  ‘LOOP  ARGUMENT  TAIL*  \ 

‘LOOP  STEP  HEAD*  WHILE  ‘LOOP  ARGUMENT  TAIL*  \ 
‘LOOP  STEP  HEAD*  UNTIL  ‘LOOP  ARGUMENT  TAIL*  \ 
‘LOOP  REPEAT  HEAD*  WHILE  ‘LOOP  ARGUMENT  TAIL* 
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52.  <FUNCTtON  OCS  IGN«rOR  > !  1 1  «P(?OCfOUI?5  IO>  \ 

‘PROCEDURE  IO»  (  ‘PdRAMETER  LIST>  I 

2.3  SIMPLE  EXPRESSIONS 

53.  «REL«TI0NAL  CP£RArOR>!!-  LES  \  LEO  \  EQL  \  GRT  \  GEO  \  NE 0 

54.  «RELATION>!!=  ‘ARITHMETIC  EXPRESSION*  ‘RELATIONAL  OPERATOR* 

‘ARITHMETIC  EXPRESSION* 

55.  ‘ROCLEAN  primary*!!:  ‘RELATION*  \  ‘ARITHMETIC  EXPRESSION* 

56.  ‘ROOLEAN  SECONOARY*!!:  ‘OOOLEAN  PRIMARY*  \  NOT  ‘BOOLEAN  PRIMARY* 
5T.  ‘BOOLEAN  FACTOR*!!:  ‘BOOLEAN  SECONDARY*  \ 

‘BOOLEAN  FACTOR*  AND  ‘BOOLEAN  SECONDARY* 

58,  ‘BOOLEAN  TERM*!!:  ‘BOOLEAN  FACTOR*  V 

‘BOOLEAN  term*  OR  ‘BOOLEAN  FACTOR*  \ 

‘BOOLEAN  TERM*  XOR  ‘BOOLEAN  FACTOR* 

59,  ‘BOOLEAN  EXPRESSION*!!*  ‘BOOLEAN  TERM* 

60,  ‘SIMPLE  EXPRESSION*! !*  ‘BOOLEAN  EXPRESSION* 

2,3,1  AUTMETIC  EXPRESSIONS 

61,  ‘NOT*!!:  BITNOT  V  NOT8 

62,  ‘AMO*!!*  BITANO  \  ANC8 

63,  ‘OR*!  !=  BITOR  \  ORB 

64,  ‘XOF*!!=  BITXOR  \  X0R8 

65,  ‘MOLT  OP*!!=  •  \  /  \  HOD 

66,  ‘AOO  OP*  !  !=  ♦  \  - 

67,  ‘PRIMARY*!!:  ‘CONSTANT*  \  ‘VARIABLE*  \  IOC  ‘VARIABLE*  \ 

LOC  ‘PROC:OURF  10*  \  LOC  ‘FORMAT  ID*  \ 

‘FUNCTION  DESIGNATOR*  \  ‘CONDITIONAL  EXPRESSION*  \ 
‘CASE  EXPRESSION*  \  I  ‘EXPRESSION*  I 

68,  ‘PRIMARY  2*!1:  ‘PRIMARY*  \  ‘NOT*  PRIMARY 

69,  ‘PRIMARY  !*!!=  ‘PRIMARY  2*  \  ‘PRIMARY  3*  ‘AND*  ‘PRIMARY  2* 


70.  <PRIHflRV  <>!!=  <PRIMARV  3>  \ 


••PRIMARY  >.>  <OP.>  <PRIMaRY  3»  \ 

■•PRIMARY  •«>  <XOR»  <PRIMARY  3» 

71.  <FACTOR»!!=  <PRIMARY  <♦  >  \  <FACTOR»  ••  tPRIMARY  C,> 

72.  <rERM>!!=  <FACIOR»  V  <TERM>  <MOLT  OP>  <FACTOR> 

73.  <ARITHMi:TrC  f  YPRf  SSION:  •  f  =  <TFPM>  \  •AOO  OP>  <T£RM>  \ 

•ARITHMETIC  £XPRESSION>  <700  OP*  <TERM» 


2.3.2  CONCITIONAl  FXPRESSIOM 

7-.  <IF  HFAO>n=  IF  <FXPRESSION>  THEN  <EXPRESSIQN>  \ 

IF  <EXPRESSION>  THEN  <STATEMENT>  \ 

•  IF  HEAD*  .  <EXPRFSSION»  THEN  <EXPRESSION>  \ 

•IF  head*  .  •EXPRESSION*  THEN  •STATEMENT* 

75.  <IF  TAIL*!J=  IFFNO  \  ENOIF 

76.  •conditional  E XPBESSION*  !  •!£  HEAD*  •!£  TAIL*  \ 

•IF  HEAD*  ELSE  <EXPRESSICN»  •!£  TAIL*  \ 
•IF  HEAD*  FLSE  •STATEMENT*  •IF  TAIL* 


2.3.3  CASE  EXPRESSION 

7?.  <CASE  MEA()*n=  CASE  •EXPRESSION*  DO  <EXPRESSION»  \ 
CASE  <EXPRESSION*  DO  <STATEMENT»  \ 
•CASE  head*  .  <fXPRFSSION»  V 
•CASE  HEAC*  ,  •statement* 

78.  <CASE  TAIL*M=  CASEENO  N  ENOCASE 

79.  «CASE  EXPRESSION*!!^  •CASE  HEAD*  «CASE  TAIL* 

2.4  ASSIGANEA'T  EXPPfSSIOAS 

80.  <ASSIGNMFNT  expression*! !=  •VARIABLE*  =  •EXPRESSION* 
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STSTEM^NTS 

81.  <SI  «rE*1^  Nr>  I  !=  <CH«NG£  CONTROL  ST/1T£MENT>  \  <PROP£R  STATEHENT> 

3.1  change  of  control  statements 

82.  <CHANGE  CONTROL  STATEMENT  >!  !=  <GOTO  STATEHENT>  \  <rxiT  STATEMENT>  \ 

^RETURN  STATEMENT> 


3.1.1  GOTO  STATEMENTS 

83.  <GOTO  STATEMENr>  !f=  GOTO  <LABEL  IO>  \ 

goto  <SMITCH  IU>  (  <EXPRESSION>  ) 

3.1.2  EXIT  STATEMENTS 

BG.  <EXIT  STATEME  NT>  !!=  EXIT  \EXIT  <LABEL  IC»  \ 

tOCPFXlT  \  LOOPEXIT  <LAOEC  ID> 

3.1.3  RETURN  STATEMENTS 

85.  <PETUFN  STATE  MENT>1  !=  RETURN  \  RETURN  <  E  TP  RES  SI  CN» 

3.2  PROPER  STATEMENTS 

86.  <PROP‘^R  STATEMENT*!  !=  <BLOCK  STATEMENT*  \  <LOOP  STATEMENT*  \ 

<NULL  statement* 


3.2.1  BLOCK  statements 

87.  <LABEL  ENn»!!=  <LAnEL  1(1*  I  ENO  \  <LABLL  lO*  I  <LABEL  END* 

88.  <LABEL  S  T  AT  EME  NT  * !  !  =  <tXPRESSION*  \  ^STATEMENT*  \ 

<LACEL  ID*  I  <LABEL  STATEMENT* 

89.  <9LOCK  HFAn>!!=  <PROGRaM  HEAD*  5  <LAB'-:L  STATEMENT*  \ 

n^GIN  .label  STATEMENT*  \ 

<OLOCK  HT  AO*  ;  .LABEL  STATEMENT* 
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90.  <9LOCK  STftTEHeNT>!!=  <BLOCK  HEAO»  ENO  V  <8L0CK  HEao>  t  END  V 

<BLOCK  HEAO>  J  <LABEL  END> 

3.2.2  LOOP  STATEMENTS 

91.  <LOOP  STATEMENT  TAIL>!!=  <EXPRESSION>  DO  <EXPRESSION>  \ 

<EKPRESSION>  00  <PROPrR  STATEMENT> 

92.  <LOOP  STATEMENT>  !•=  WHILE  <LOOP  STATEMENT  TAIL*  \ 

<L00P  STEP  HEAD*  UNTIL  <LOOP  STATEMENT  TAIL*  \ 
<LOOP  STEP  HEAD*  WHILE  <LOOP  STATEMENT  TAIL*  \ 
<LOOF  REPEAT  HEAD*  WHILE  <LOOP  STATEMENT  TAIL* 

3.2.3  NULL  STATEMENT 

93.  <NULL  STATEMENT* n=  NULL 
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DECLA»AT  IONS 


94.  <nECLfiRATION>!  •=  <PfiOCEOURE  OECLARATION>  \  <OATA  DECLARATION> 

4.1  ATlRIeUTES 

95.  <TYPE  ArTRIBOTE>  «!=  REAL  \  INTEGER  V  OOUBL-  \  POINTER 

95.  <FULL  AT IRIPUTr> !!=  OWN  <TVPE  ATTRIBUTF>  \  <TYPE  ATTRIBUTE*  CNN 

97.  <ArTRIBUT;:  HfAO>f!=  tTYPF  ATTRIBUTE*  STACK  \ 

FORMAT  \  ALPHA  \  DEVICE 

98.  <VALU^  ATTRIBUTE*!!!  VALUE  <TYPE  ATTRIBUTE*  \ 

<TYPE  ATTRIBUTE*  VALUE 

99.  <PROCtOURE  ATTRIBUTE*!!!  PROCEDURE  \  <TYPE  ATTRIBUTE*  PROCEDURE  V 

LINK  PROCEDURE  \ 

<TyPE  ATTRIBUTE*  LINK  PROCEDURE 

100.  <ARKAY  SIZE*!!=  <INTEGER»  V  <INTEGER*  .  <INTEGER*  \ 

<INTtGER*  ,  <INTEGER*  .  <tNTEGER* 

101.  <fXTERNAL  SIEE>!!=  <ARRAY  SIZE* 

4.2  PROCECURE  DECLARATIONS 

102.  ‘ARGUMENT  MEAD  2»!!r  ‘ATTRIBUTE  HEAD*  \  ‘TYPE  ATTRIBUTE*  4 

‘PROCEDURE  ATTRIBUTE*  \ 

‘PRCCEDURE  ATTRIBUTE*  ‘ARGUMENT  LIST*  \ 

‘TYPE  ATTRIBUTE*  ARRAY  1  ‘FXTtRKAL  SIZE*  I  V 
HALF  ARRAY  I  ‘EXTERNAL  SIZE*  1  V 
‘VALUE  attribute* 

lOT.  ‘ARGUMENT  HEAO*!!=  1  ‘ARGUMENT  HEAD  2*  \ 

‘ARGUMENT  HEAD*  .  ‘ARGUMENT  HEAD  2* 

104.  ‘ARGUMENT  LIST*If!  ‘ARGUMENT  HEAD*  »  \  (  OPTARG  I  \ 

‘ARGUMENT  HEAD*  .  OPTARG  I 


A-9 


105.  ARRAY  IYPE»>!=  <IYPE  AtIRimiTE>  ARRAY  \  HALF  ARRAY 
10b.  ‘ARRAY  SPfCIFICATJON>! !=  ‘ARRAY  TYPE*  ‘ICERTIFIER* 

(  ‘EXTERNAL  SIZE*  I  \ 
‘ARRAY  SPECIFICATION*  ,  ‘IDENTIFIER*  \ 
‘ARRAY  SP-'CIFICATION*  ,  ‘IDENTIFIER* 

I  ‘EXTERNAL  SIZE*  » 

107.  ‘PROCEDURE  SPE  C I  FICA  T  ION  *  H  =  ‘PROCEDURE  ATTRIBUTE*  ‘IDENTIFIER*  \ 

‘PROCEDURE  ATTRIBUTE*  ‘IDENTIFIER* 
‘ARGUHENT  LIST* 

10b.  ‘SPECIFICATION  tLLMENT*!l=  ‘ATTRIBUTE  HEAD*  ‘IDENTIFIER*  \ 

‘TYPE  ATTRIBUTE*  ‘IDENTIFIER*  S 
‘SPECIFICATION  ELENENT*  .  ‘IDENTIFIER* 
lOS.  ‘SPECIFICATICN  PARI*!1=  ‘SPECIFICATION  ELEMENT*  \ 

‘PROCEDURE  SPECIFICATION*  S 
‘ARRAY  SPECIFICATION* 

no.  ‘EXECUTIVE  HEAD*!!*  EXEC  \  EXEC  INTERRUPT  ‘INTEGER* 

111.  ‘OESCOIPTOR  HEAD*!!*  ‘EXECUTIVE  HEAD*  PROCEDURE  ‘IDENTIFIER*  V 

‘PROCEDURE  ATTRIBUTE*  ‘IDENTIFIER*  \ 

‘PROCEDURE  ATTRIBUTE*  ‘IDENTIFIER*  (  OPTARG  » 
117.  ‘PRCCrOURf  HEAD  1*!!=  DEFINE  ‘PROCEDURE  ATTRIBUTE*  ‘IDENTIFIER* 

I  ‘IDENTIFIER*  \ 

‘PROCEDURE  HFAO  1*  ,  ‘IDENTIFIER* 

113.  ‘PROCFOUR.  HFAO  2*11=  ‘PROCEDURE  HEAD  1*  I  \ 

‘PROCEDURE  HEAD  1*  ,  OPTARG  ) 

llA.  ‘PROCEOUR’’  head  3*!!=  ‘PROCEDURE  HEAD  7*  1  VALUE  ‘IDtNIIFIER*  \ 

‘PROCtOURE  HEAD  3*  .  ‘IDiNTIFIFR* 

115.  ‘PROCEDURE  HEAO*!'=  OEFINF  ‘DESCRIPTOR  HEAD*  \ 

‘PROCEDURE  HEAD  7*  !  ‘SPECIFICATION  PART*  V 
‘PROCEDURE  HFAO  3*  1  ‘SPP  C 1  F  IC  A  I  ICN  PART*  \ 
‘PROCEDURE  HEAD*  1  ‘SPECIFICATICN  PART* 


A- 10 


JAtf  X. 


116.  <PROCEOUR€  BCOY>!!=  <eLOCK  STMEHENT> 

117.  <PROCrOURE  OECLSRAI  ION>H=  <PROCEOURP  HEAO»  t  <PROCEDURE  BOOY» 

<1.3  DATA  DECLARATIONS 

118.  <OATA  OPCL8RATION>!  !=  <AKRAY  OECLARATION>  \  <TYP£  0£CLARATION>  \ 

<ALPHA  DECLARATION*  \  <SMIICH  DECLARATION*  \ 
<EXIERNAL  DECLARATION*  \ 

<STACK  DECLARATION*  V  <GLOBAL  DECLARATION*  \ 
<FORMAT  DECLARATION*  \  <OEYICE  DECLARATION*  \ 
<TASS  DECLARATION*  \  <INSERT  DECLARATION*  \ 
<COMPONENT  DECLARATION  1*  \ 

<COMPONENT  DECLARATION  2*  \ 

<COMMON  DECLARATION*  \  <PRESET  DECLARATION*  \ 
<SYNONVH  DECLARATION* 

<<.3.1  ARRAY  DECLARATIONS 

119.  <ARRAY  ATTRIBUTE*!!®  <TYPE  ATTRIBUTE*  \  <FULL  ATTRIBUTE*  \ 

OWN  HALF  \  HALF  \  HALF  ONN 

120.  <ARRAY  DECLARATION*!!®  <ARRAY  ATTRIBUTE*  ARRAY  <IOCNTIFIER* 

I  <ARRAY  SIZE*  )  V 

<ARBAY  DECLARATION*  ,  <IOENTIFIER*  \ 

<ABRAY  declaration*  .  cIOtNTIFIER* 

(  <ARKAY  SIZE*  ) 

4.3.2  TYPE  DECLARATIONS 

121.  <TYPE  DECLARATION*!  !=  <TYPE  ATTRIDUTL*  <  I  O'N  T  IF  IE  R  *  \ 

<FULl  ATTRIBUTE*  ‘IDENTIFIER*  \ 

‘TYPE  DECLARATION*  ,  ‘IDENTIFIER* 
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ALPHA  DLCLARAT  IONS 


122.  <ALPHA  ATTRIBUTr.>!(=  ALPHA  \  OMN  ALPHA  \  ALPHA  OHN 

123.  <ALPHA  OfCLARATION>l !=  <ALPHA  ATTRIBUTE*  <IOENTIFIER> 

C  «INTEGER>  »  \ 

<ALPHA  DECLARATION*  .  <IOENTIFIER*  \ 
<ALPHA  DECLARATION*  ,  <IOEHTIFIER> 

C  cINTEGER*  ) 


A. 3.4  SNITCH  OECLAPATIONS 

124.  «LABEL  LIST*!T=  <LAB£L  10*  \  <LABEL  LIST*  ,  <LA8EL  ID* 

126.  <SHITCH  CECLARATION*l!=  SNITCH  <IOENTIFIER*  =  <LABEL  LIST* 

4.3.5  c  XTERNAL  DECLARATIONS 

126.  «TXTERNAL  OECL  AR  AT  ION* ! !  =  «EXTERNAL  PROCEDURE  DECLARATION*  \ 

<EXTERNAL  VARIABLE  DECLARATION*  \ 
<EXTERNAL  STACK  GROUP*  \ 

<EXTERNAL  ARRAY  DECLARATION* 

4. 3. 5.1  EXTERNAL  PROCEDURE  DECLARATIONS 

127.  <EXTERNAL  procedure  DEC  L  ARATION*  !  T  =  EXTERNAL 

cPROCEDURE  SPECIFICATION* 


4. 3.5.2  EXTERNAL  VARIABLE  DECLARATIONS 


128.  <EXTERNAL  VARIAPLE  DECLARATION* 1 1*  EXTERNAL  » TYPE  ATTRIBUTE* 

•  identifier*  \ 

•EXTERNAL  VARIABLE  DECLARATION* 

•  IDENTIFIER* 
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^.3.e.3  EXTcPNAL  STACK  GROUP  DECLARATION 

129.  <LXTEPNAL  STACK  GROUP>lf=  EXTERNAL  <ATTRIBUTE  HEAO>  <IOENTIFIER>  V 

<£XTERNAL  STACK  GROUP*  .  <IOENTIFIER» 

*i.3.'=.i*  EXTERNAL  ARRAY  OfCLARATIONS 

130.  <ARRAY  LIST*H=  <IOENTIfIER»  «  <EXTERNAL  SIZE*  )  \ 

<ARRAY  LIST*  .  <IOENTIFIER*  \ 

<ARfiAY  LIST*  .  «IOeNTIFIER*  (  <EXTtRNAL  SIZE*  I 

131.  <EXTERNAL  ARRAY  OECLARAT ION* ! » =  EXTERNAL  <TYPE  ATTRIBUTE*  ARRAY 

<ARRAY  LIST*  \ 

EXTERNAL  HALF  ARRAY  <ARRAV  LIST* 

A. 3.6  STACK  DECLARATIONS 

132.  <STACK  NAME*1!=  <IDENTIFIfR*  «  <INTEGER*  I 

133.  <STACK  declaration*!!*  <TYPE  ATTRIBUTE*  STACK  ‘STACK  NAHE*  \ 

‘FULL  ATTRIBUTE*  STACK  ‘STACK  NAHE*  \ 

‘STACK  DECLARATION*  ,  ‘IDENTIFIER*  \ 

‘STACK  DECLARATION*  ,  ‘STACK  NAME* 

A. 3.7  GLOBAL  DECLARATIONS 

13'.,  ‘GLODAL  DECLARATION*!!*  GLOBAL  ‘IDENTIFIER*  \ 

‘GLOBAL  DECLARATION*  ,  ‘IDENTIFIER* 

A. 3.8  FORNAT  DECLARATIONS 

135.  ‘OPTIONAL  **!!=  *  \  ‘EMPTY* 

136.  ‘OPTIONAL  -*!•=  -  \  ‘EMPTY* 


13"’.  <rORM«T  ELeMtNT>!!=  <0PT10KAL  *»  <STRING>  \ 

<INTrG':S>  C  <FORHAT  LI3T>  I  \ 

R*<nFCIHAL  N0H8E«>*  \ 

<OPTIONAL  $>  P*<Di;CIPAL  NUHBF:R>*  F'tOPTIONAL  -> 

<OFCIMAl  NUHaER>'  \ 

P*<C'^CIrtAL  NUM8ER>*  <OPTIONAL  t>  F'<OPTIOMAL  -> 

<OECIMAC  NUM0ER>'  \ 

<OPTTOKAL  $>  F'<OPTICNAL  -»  <DECIKAL  NUMBER>*  \ 

♦optional  $»  1*<CPTI0NAL  ->  <0EC1PAL  NUMBER>  •  \ 

♦  OPTIONAL  *»  0*<0PTlCNAL  ->  <n;ClHAL  N0HBER»'  \ 

♦optional  *>  H*<OPTIONAL  -»  ♦DECIMAL  NUHBER> *  \ 

♦  OPTIONAL  »>  0*<0PTICNAL  -»  ♦DECIMAL  NUMBER>*  V 

♦OPTIONAL  t>  S*<D£CIMAL  NUMBER> *  \ 

♦optional  %>  E*<0ECIMAL  NUMBER>*  \ 

♦OPTIONAL  $»  L'<0ECIMAL  NUMBER>'  \ 

♦OPTIONAL  *»  A*<0ECIMAL  NUMBER>' 

13«.  <F0RMAT  LIST>!!=  ♦FORMAT  EL£MENT>  \  <FORMAT  LIST>  .  cFORMAT  ELEMENT> 
139.  <FORMAT  C^CL ARAT ION > ! ! =  FORMAT  <IO£NTIFI£R>  C  ‘FORMAT  LIST>  ) 

A. 3.9  DEVICE  DECLARATIONS 

lAO.  ♦OEVICE>n-  CPRINT  \  SPRINT  \  MOF  \  MTF  \  KBOSS  \  ICl 
lAl.  <nEVICE  DECIARAT  ION>!J=  OEVICF  ♦IOENTIFIER>  =  <OEVICE>  \ 

♦  DEVICE  DECLARATIDN>  .  ♦IOENTIFIER> 

=  ‘DEVICE* 


A. 3. to  TASS  DFCLARATIONS 

1A2.  ‘IASS  OF  CLARAT  ION*!  «=  TASS«TASS  CONTROL  CAROS*  (SEE  TEXTI 
A. 3.11  insert  DECLARATIONS 


1A3.  ‘INSERT  OFCIARAT  ION*!  t=  INSERT  ‘IDENTIFIfR.  (  ‘IDENTIFIER*  » 


145.  <COHPCNINT  LIST>!!=  <COHPONEMT  ATT^lIQUTE*  <IOENTIFieS>  \ 

<CCHFOMENT  LIST>  ,  <IO"NTIFIES> 

146.  <COHPCNENT  0FFS6T>!!=  OFFSET  ♦  <IMTEGER>  \  OFFSET  -  <INTEGER>  \ 

OFFSET  <INTEGER» 

147.  <OFFSET  LIST>!!=  <CCHPONFNT  OFFS£I>  FOR  <IOENTIFIEP>  \ 

<OFFSET  LIST>  ,  <IOENT IF !£«> 

148.  <SIGN  EXTENSION> !!=  LOGICAL  \  ARITHMETIC 

149.  <niT  FI£Ln*!T=  <SIGN  EXTENSIOM>  FIELD  {  <1NTEG£R»  .  <1NTEGER»  >  \ 

FIELD  (  <INTECER>  .  <INTEGER»  ) 

150.  <FIELO  LIST>!!=  <011  FItLO»  FOR  <IDENTIFIER»  \ 

<FIELD  LIST»  t  <IOENTIFIEK» 

151.  <COMPON-NT  DECLARATION  1>TI=  <COMPONENT  LIST>  \  <OFFSET  LIST>  \ 

<FIELD  LIST> 

162.  <COMPONENT  HEAO»!»=  <COMPONFNT  ATTRIBUTE>  <IDENTIFIER> 

153.  <COMPONENT  TAIL>!!=  «  <RIT  FIELO>  ,  <CCMPONFNT  OFFSET>  )  \ 

•  <COMPONENT  OFFSET>  ,  <BIT  FlELp>  »  \ 

«  <CCMPONENT  OFFSET>  I 

154.  <COMPONENT  DECLARATION  2>!l=  <COMPONENT  HEAO>  <COMPONENT  TAIL> 


4.3.13  COMMON  DECLARATIONS 

155.  <COMMCN  HtAO>!!=  GLOBAL  COMMON  <1  Dt  NT  IF  IER>  ? 

EXTERNAL  COMMON  <IDENTIFIER>  !  \ 

156.  <COMMCN  FLEMFNT>!!=  <TTPE  DECLARATION*  \  <4LPHA  DECLARATION*  \ 

<ARRaY  DECLARATION*  \  <STACK  DECLARATION* 

157.  <COMMON  LIST»!I=  <COMMON  ELEMENT*  t  \ 

<COMMON  LIST*  <COMMCN  ELEMENT*  1 
156.  <COMMON  TAIL»!!=  ENOCOM  \  COMEND 

159.  <COMMCN  OlCLAPATIOM*!!=  <CPMM0N  HEAU*  <C0MM0N  LIST*  <CCMMON  TAIL* 
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PRESET  OFCLARATIONS 


160.  <SIPPLE  EXPRESSION  LIST>1!=  <SIHPLE  EXPRESSIOM>  \ 

<SIMPLE  EXPRESSION  LISI>^. 

<SINPLE  EXPRESSION> 

161.  <PRtSET  EIEMENT»!!=  <VARIABLE»  =  <SIHPLE  EXPRESSION  IIST>  \ 

<VARIABLE>  TO  <VARIA0LE»  = 

<SINPLE  EXPRESSION  LIST> 

162.  <PRESET  LIST>!!=  <PRESET  ELEMENT>  \ 

<PReSET  LISr>  ?  ‘PRESET  ELEHeNr> 

163.  ‘PRESET  UECLARATION>!!=  PRESET  ‘PRESET  EIEHENT>  \ 

PRESET  BEGIN  ‘PRESET  LIST>  END  \ 

PRESET  BEGIN  ‘PRESET  L1ST>  t  END 

6.3.15  synonym  OECLARATICNS 

166.  <THtL  ITEM>!t=  ‘CONST6NT>  \  ‘lOENTI FIER >  \ 

any  OPERATOR  OR  DELIMITER 

165.  ‘THLL  ITEM  SEQUENCE*!!*  ‘EMPTY*  \  ‘THLL  ITEM*  \ 

‘THLL  ITEM  SEQUENCE*  ‘THLL  ITEM* 

1E6.  ‘SYNONYM  RIGHT  SI DE *!! =  ‘EMPTY*  \  ‘CONSTANT*  \ 

‘ITEM  DELIMETER*  ‘THLL  ITEM  SEQUENCE* 

‘ITEM  DELIMETER* 

167.  ‘ITEM  DELIMETER*!!*  ‘THLL  ITEM*  THAT  IS  NOT  A  ‘CONSTANT*  OR 

SEMICOLON  ANO  DOES  NOT  OCCUR  IN  ‘THLL  ITEM  SEQUENCE* 

168.  ‘SYNONYM  :L£MENT*!!=  ‘IDENTIFIER*  =  ‘SYNONYM  RIGHTSICE* 

169.  ‘SYNONYM  LIST*!!*  ‘SYNONYM  ELEMENT*  \ 

‘SYNONYM  list*  ;  ‘SYNONYM  ELEMENT* 

170.  ‘SYNONYM  declaration*!!*  SYNONYM  ‘SYNONYM  ELEMENT*  \ 

SYNONYM  BEGIN  ‘SYNONYM  LIST*  END  \ 

SYNONYM  BEGIN  ‘SYNONYM  LIST*  1  END 


PROGRAMS 


171.  ^PROGRAM  HeAO>!!=  9EGIN  <OrCLARAT  ION>  \ 

<P»OGRAM  HEAO>  1  <OECL ARAT I  ON > 

172.  <PROGRAM>!!=  <IOtMTlFIER>  <PRO&RAM  HEAD*  END  FINIS  \ 

<IOEMTIFIER>  <PROGRAH  HEAn>  J  END  FINIS 


APPENDIX  B 

tricomp  compiler  directives 


B.l  GENERAL  DESCRIPTION 


The  compiler  directives  are  used  to  communicate  various  options  to 
the  compiler  and  to  control  the  format  of  the  printable  listing. 

The  compiler  enters  the  directive  mode  when  either  a  \  or  \\  is 
detected.  The  directive  mode  is  terminated  when  the  end  of  an  input 
card  has  been  detected.  The  \\  will  allow  the  active  card  to  app>ear 
on  the  printed  listing.  The  \  will  suppress  printing  of  the  active 
input  card.  The  line  counts  will  indicate  that  a  line  was  suppressed. 

The  \  and  W  will  have  no  effect  in  a  comment,  TASS  declaration,  or 
SYNONYM  definition.  The  \  or  \\  can  appear  after  any  THLL  item  except 
FINIS  and  TASS;.  If  during  a  synonym  expansion  a  \  or  \\  occurs,  it 
will  cause  the  directive  mode  to  be  entered.  The  remainder  of  the 
synonym  (even  if  on  different  cards  in  the  synonym  definition)  and  the 
remainder  of  the  input  card  will  be  considered  directives.  A  \  detected 
in  a  synonym  expansion  will  cause  that  line  to  be  suppressed.  The 
following  synonym  definition  will  allow  lines  containing  \  to  be  printed. 

SYNONYM  \  =  -  \  \  -  ; 

In  a  similar  manner,  all  directives  may  be  suppressed  in  the  listing. 

More  than  one  directive  may  be  included  on  one  input  card.  The 
directives  have  the  following  general  form: 

KEY  D  Y 

where 


KEY  is  a  keyword  identifier 

D  is  an  optional  series  (possibly  empty)  of  THLL  items  that  do  not 
match  the  THLL  item  Y  required  by  the  KEY 

Y  is  either  an  identifier,  string,  number,  or  signed  number  as 
required  by  the  KEY.  Some  directives  do  not  require  a  Y. 

Examples  .- 

(a)  \  LINE  =  1 

(b)  \  TITLE  #'NAME  OF  MY  TASK' 

(c)  \\  TITLE  =  #”  ,PAGE 

The  first  excimple  will  cause  the  input  lines  to  be  double  spaced. 

The  second  example  will  put  a  title  on  each  page.  The  third  example 


removes  the  user's  title  and  causes  a  page  to  be  ejected.  Only  the 
third  excimple  will  be  printed.  The  =  and  comma  are  completely  optional. 

The  KEY  used  in  the  directives  is  just  a  predefined  identifier 
which  has  no  special  meaning  when  not  in  the  directive  mode,-  therefore, 
the  KEY  words  are  not  reserved  words. 

When  the  directive  mode  is  entered,  only  a  KEY  or  end  of  card  will 
be  recognized.  After  a  key  is  recognized,  only  the  Y  or  end  of  card 
will  be  recognized.  If  the  Y  is  a  string,  processing  continues  until 
the  string  is  terminated.  Therefore,  the  user  should  be  careful  to 
terminate  the  string.  Failure  to  do  so  can  cause  subsequent  source 
cards  to  be  incorporated  in  the  string,  since  string  processing  does  not 
terminate  at  the  end  of  the  card.  The  directive  mode  is  restar‘‘ed  after 
a  directive  has  been  completely  recognized. 

Most  of  the  options  on  the  TRICOMP  control  card  are  svailable 
through  directives.  The  directive  KEY  spelling,  in  some  cases,  will  not 
be  the  same  as  the  spelling  of  the  option  on  the  TRICOMP  card.  After 
the  completion  of  a  compile  unit  (program),  the  compiler  will  return  to 
the  state  as  defined  on  the  TRICOMP  card.  Therefore,  each  compile  unit 
can  specify  the  resources  needed  for  that  program. 


B.2  DIRECTIVE  NOTATION 

The  following  notation  is  used  in  the  description  of  directives: 

N  -  is  an  integer  number.  It  may  be  a  binary,  octal,  decimal  or 
hexadecimal  integer  constant.  The  number  must  not  be  real  or 
large  enough  to  be  considered  double .  An  illegal  number  will 
cause  that  directive  recognition  to  be  aborted  and  the  direc¬ 
tive  mode  to  be  restarted.  All  signs  are  also  ignored. 

SN  -  is  an  integer  number  with  optional  sign.  (See  the  description 
of  N  above.) 

S  -  is  a  string.  If  the  string  is  continued  on  the  next  card,  the 
directive  is  ignored  and  directive  processing  is  terminated. 

ID  -  is  an  identifier.  The  identifiers  used  as  KEYs  may  also  be 
used  without  causing  confusion.  A  new  directive  will  not  be 
started  by  using  KEY  as  cin  identifier. 

Except  as  noted,  all  directives  are  valid  within  one  progreim.  The 
compiler  will  return  to  t)ie  state  specified  on  the  TRICOMP  control  card 
after  each  program. 


B-2 


B.3  LISTING  DIRECTIVES 


1.  PAGE  -  Immediately  home  paper.  If  this  directive  is  printed, 
it  would  appear  on  the  new  page . 

2 .  SPACE  N  -  Print  N  blank  lines  before  the  next  printable 
line.  If  the  next  printable  line  comes  from  an  insert  that  is  not  being 
printed,  then  the  directive  is  ignored.  Spacing  will  not  pass  the  end 
of  page.  Default  is  0. 

3.  LINE  N  -  Print  N  blank  lines  after  each  printable  line. 
Spacing  will  not  pass  the  end  of  page.  The  next  printable  line  will 
appear  at  the  top  of  the  next  page.  Default  is  0. 

4 .  TAB  N  -  Move  the  card  image  right  to  the  N^^  column .  The 
integer  number  is  limited  to  48.  Default  is  0. 

5.  ATAB  SN  -  Adjust  the  TAB  number  by  SN.  If  SN  is  negative, 
the  tab  will  move  to  the  left.  The  tab  number  will  not  go  below  0  or 
above  48.  Tab  numbers  less  than  0  are  replaced  by  0,  but  tab  values 
greater  than  48  are  remembered  but  limited  to  48. 

6 .  TITLE  S 

or 

TITLE  -S  -  Print  the  string  S  at  the  top  of  each  page  just 
below  the  standard  TRICOMP  header.  If  the  minus  (-)  is  used  before  the 
string,  then  the  string  will  begin  in  column  1  and  its  first  character 
will  be  interpreted  as  a  carriage  control  character.  Otherwise,  the 
string  will  be  printed  starting  in  column  21.  This  directive  will  be 
ignored  if  the  string  goes  beyond  the  end  of  card.  Long  strings  can  be 
defined  in  a  synonym  and  then  expemded  in  the  S  position.  A  maximum  of 
130  characters  including  the  carriage  control  character  can  be  handled 
by  the  compiler.  Longer  strings  will  be  truncated.  If  the  standard 
TRICOMP  header  is  suppressed,  column  1  will  be  set  to  the  home  paper 
carriage  control  character  and  columns  121  through  130  will  be  used  to 
specify  the  page  number.  An  empty  string  will  suppress  the  directive 
title  line.  Default  is  no  title  line. 

7 .  NOHEADER  -  Suppress  the  standard  TRICOMP  header  at  the  top 
of  each  page.  If  no  directive  title  line  is  specified,  only  the  home 
paper  carriage  control  and  page  number  will  be  printed  for  each  new  page. 
These  will  be  added  to  the  title  line  if  it  does  exist,  and  the  title 
line  will  be  first  on  the  page. 

8.  HEADER  -  Restore  the  standard  TRICOMP  header  at  the  top  of 
each  page.  If  a  directive  title  line  was  being  printed,  it  must  be  re¬ 
defined  because  the  home  paper  carriage  control  has  been  placed  in  that 
line.  Both  the  standard  TRICOMP  header  and  title  line  would  cause  a  new 
page  to  be  ejected.  HEADER  is  default. 
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9.  RSIDE  N  -  If  N  =  0,  the  right  side  of  the  listing  is 
suppressed.  If  N  =  1,  restore  the  right  side  of  the  listing.  This  is 
helpful  if  a  listing  is  to  be  printed  on  the  intercom.  The  right  side 
of  the  listing  includes  columns  73  through  90  of  the  input  card  image 
and  the  program  name  and  line  number.  Default  is  0. 

10.  MLINE  N  -  Print  a  maximum  of  N  lines  to  a  page.  Low  value 
of  N  is  limited  to  10.  There  is  no  upper  end  of  the  value  of  N.  Large 
values  of  N  will  have  the  effect  of  suppressing  page  headers.  The 
standard  TRICOMP  header,  directive  title  line  (if  it  exists) ,  and  the 
top  blank  line  are  not  counted  towards  this  line  count.  Default  is  56. 


B.4  COMPILER  DIRECTIVES 

1.  NOCODE  -  No  code  is  to  be  generated.  Pass  3  is  suppressed. 
This  is  equivalent  to  P=2  on  the  TRicOMP  control  card  or  PASS=2  directive . 
Default  is  to  include  all  passes  if  no  fatal  error  occurs. 

2.  LIST  N  -  This  is  the  same  as  the  L  =  octal  number  on  the 
TRICOMP  control  card. 

N  =  0:  No  listing  except  for  errors  auid  compile  times. 

N  =  1:  List  only  the  source  input  file,  errors,  cross- 

reference  and  compile  times.  This  is  default. 

N  =  2 :  Also  list  the  insert  files  in  addition  to  the 
N  =  1  option. 

3.  OPT  N  -  Same  as  the  OPT  option  on  the  TRICOMP  control 
card.  On  the  directive  card,  any  THLL  constant  number  can  be  used. 

N  =  0:  No  optimization 

N  =  1:  Ootimization  is  done. 

Optimization  is  turned  on  by  a  single  bit.  Default  is  1.  This  directive 
will  cause  the  optimization  to  be  altered  at  that  point  in  the  program. 

4.  BOUNDS  N  -  This  is  the  same  as  the  B  =  octal  number  option 
on  the  TRICOMP  control  card. 

N  =  0;  No  runtime  check  of  array  subscripts  will  be 

performed. 


N  /  0:  Runtime  array  bounds  check.  This  is  default. 

This  directive  will  alter  the  bounds  checking  at  that  point  in  the  program. 
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5.  ABORT  -  This  will  cause  the  compiler  to  terminate  the 
SCOPE  job  control  stream  if  this  or  any  of  the  remaining  input  programs 
has  a  fatal  error.  All  of  the  input  THLL  programs  will  be  compiled, 
but  after  the  last  program,  TRICOMP  will  abort  to  an  EXIT(S)  card  if  any 
of  the  programs  has  a  fatal  error.  EXIT  and  EXIT(U)  control  cards  will 
not  be  honored  when  skipping  SCOPE  control  cards.  The  directive  will 
not  cause  an  abort  if  only  an  earlier  program  has  a  fatal  error.  Default 
is  to  not  abort. 

6.  SKIP  -  This  turns  on  the  skip  mode  of  the  compiler.  All 
input  between  the  SKPSTART  and  SKPEND  directives  will  not  be  processed 

by  the  compiler.  The  SKPSTART  directive  must  occur  after  the  SKIP  direc¬ 
tive.  Care  must  be  taken  because  skipping  can  go  beyond  program 
boundaries . 

7.  N03KIP  -  This  turns  off  the  compiler  skip  mode.  The 
SKPSTART  and  SKPEND  directives  will  not  be  honored.  This  is  default. 

8.  SKPSTART  -  If  the  skip  mode  is  active,  then  start  skipping 
all  input  until  a  SKPEND  directive.  The  SKPEND  directive  is  the  only 
directive  that  will  bo  honored. 

9.  SKPEND  -  This  terminates  the  skipping  of  the  input  text. 

It  has  no  effect  if  there  is  not  skipping.  It  can  come  from  a  synonym 
expansion.  It  cannot  come  from  an  insert  file  that  is  not  already  active. 
(Insert  declarations  are  skipped.) 

10.  PRIV  -  This  is  the  same  as  the  EXEC  option  on  the  TRICOMP 
control  card.  This  causes  only  the  current  program  to  be  assembled  in 
PRIV  mode. 

11.  NOPRIV  -  This  turns  off  the  EXEC  option  on  the  TRICOMP 
control  card  for  just  the  current  program. 

12.  PASS  N  -  This  is  the  same  as  the  P  =  octal  number  option 
on  the  TRICOMP  control  card. 

N  =  1,  2,  3,  4:  Execute  N  passes  of  the  compiler,  and 
then  pass  5. 

N  =  5:  Execute  all  passes. 

13.  SCHEMA  -  This  turns  on  the  SCHEMA  option  on  the  TRICOMP 
control  card  for  just  the  current  program.  Generate  schema  data. 

14.  NOSCHEMA  -  This  turns  off  t)ie  SCHEMA  option  on  the  TRICOMP 
control  card  for  just  the  current  program.  Do  not  generate  schema  data. 


15.  CRET  -  This  turns  on  the  CRET  option  on  the  TRICOMP  control 
card  for  just  the  current  program.  Compile  as  a  GDDF  creating  program. 

16.  NOCRET  -  This  turns  off  the  CRET  option  on  the  TRICOMP 

control  card  for  just  the  current  program.  Compile  as  normal  program. 

This  is  default  unless  CRET  appeared  on  the  TRICOMP  control  card. 

17.  ('.DDF  -  This  turns  on  the  GDDF  option  on  the  TRICOMP  control 
card  for  just  the  current  program.  Compile  as  a  program  that  is  to  be  as¬ 
sembled  using  a  GDDF. 

18.  NOGDDF  -  This  turns  off  the  GDDF  option  on  the  TRICOMP 

control  card  for  just  the  current  program.  No  GDDF  is  allowed  in  the 

assembly  program  generated  by  the  compiler.  This  is  default  when  GDDF 
is  not  specified  on  the  TRICOMP  control  card. 

19.  CODEFILE  ID  -  This  is  the  same  as  the  A  =  Filename  option 
on  the  TRICOMP  control  card  for  just  the  current  assembly.  The  default 
filename  for  the  output  to  the  assembler  is  BPCODE  unless  changed  on 

the  TRICOMP  control  card.  Only  the  last  filename  specified  by  a  CODEFILE 
directive  will  be  used  for  that  program.  The  code  cannot  be  sent  to  more 
than  one  file. 

20.  XREF  N  -  This  is  the  same  as  the  R  =  octal  number  option 
on  the  TRICOMP  control  card.  This  controls  the  level  of  cross-reference. 
This  directive  cannot  be  used  after  the  first  user-defined  symbol  is 
encountered. 

21.  T  ID  -  This  is  the  same  as  the  T  =  ID  option  on  the  TRICOMP 
control  card.  The  default  filename  for  TASS  control  cards  is  TCARD  unless 
changed  on  tlie  TRICOMP  control  card.  This  directive  will  liavc  effect  only 
within  one  program.  All  the  cards  included  in  TASS  declarations  will  go 
to  the  last  specified  file.  Additional  T  directives  will  cause  the  cards 
in  the  following  TASS  declarations  to  go  to  the  newly  specified  file.  A 

T  directive  cannot  be  placed  in  a  TASS  declaration.  The  directive  card 
would  be  written  on  the  TASS  control  card  file. 

22.  ICF  N  -  This  is  the  saune  as  the  ICF  =  octal  number  option 
on  the  TRICOMP  control  card  for  only  the  current  program. 

23.  DSS  N  -  This  is  the  same  as  the  DSS  =  octal  number  option 
on  the  TRICOMP  control  card  for  only  the  current  prograim. 

24.  RSS  N  -  This  is  the  same  as  the  RSS  =  octal  number  option 
on  the  TRICOMP  control  card  for  only  the  current  program. 
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25.  LAB  N  -  This  is  the  same  as  the  LAB  =  octal  number  option 
on  the  TRICOMP  control  card  for  only  the  current  program. 

26.  HEAD  N  -  This  is  the  same  as  the  HEAD  =  octal  number  option 
on  the  TRICOMP  control  card  for  only  the  current  progreim. 

27.  FSL  N  -  This  is  the  same  as  the  FSL  =  octal  number  option 
on  the  TRICOMP  control  card  for  only  the  current  progreim.  In  order  for 
this  directive  to  have  an  effect,  it  must  occur  before  the  first  format 
declaration. 

28.  SYN  N  -  This  is  the  same  as  the  SYN  =  octal  number  option 
on  the  TRICOMP  control  card  for  only  the  current  progreim.  In  order  for 
this  directive  to  have  an  effect,  it  must  occur  before  the  first  synonym 
definition. 

29.  DEBUG  N  -  Compiler  systems  use. 

30.  CGOPTS  N  -  Compiler  systems  use. 

31.  BIN  S  -  This  is  the  same  as  the  BIN  =  PPNNNNN  option  on 
the  TRICOMP  control  card.  It  applies  to  current  compile  unit.  When 
the  compile  unit  has  been  completely  processed,  the  compiler  reverts  to 
the  mode  specified  on  the  TRIcOMP  card.  The  string  S  must  be  of  the  form 
such  that  it  represents  the  name  of  a  Binder  Library,  for  example  BIN  = 
#/BTLIBR/.  If  the  string  contains  more  than  eight  characters,  it  will 

be  truncated  to  eight  characters.  The  use  of  a  null  string,  such  as 
BIN  =  tt//,  will  cause  the  compiler  to  generate  source  code  for  TASS  on 
the  file  specified  by  the  A  option  on  the  TRICOMP  card,  the  file  specified 
by  the  CODEFILE  compiler  directive,  or  the  default  file  BPCODE. 

32 .  MAXBLK  N  -  This  is  the  same  as  the  MAXBLK  =  octal  number 
option  on  the  TRICOMP  control  card  for  only  the  current  program.  In 
order  for  this  directive  to  have  an  effect,  it  must  occur  before  the 
first  user-defined  block.  Only  the  first  occurrence  of  this  directive 
in  a  progreim  will  be  honored. 

33.  IDSS  N  -  This  is  the  same  as  the  IDSS  =  octal  number  option 
on  the  TRICOMP  control  card  for  only  the  current  program.  In  order  for 
this  directive  to  have  an  effect,  it  must  occur  before  the  first  user- 
defined  block  is  opened.  Only  the  first  occurrence  of  this  directive  in 

a  program  will  be  honored. 

34.  SCANMAX  N  -  This  is  the  same  as  the  SCANMAX  =  octal  number 
option  on  the  TRICOMP  control  card  for  only  the  current  program. 
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35.  ICFMIN  N  -  This  is  the  same  as  the  ICFMIN  =  octal  number 
option  on  the  TRICOMP  control  card  for  only  the  current  program. 

36.  ICFPAGE  N  -  This  is  the  same  as  the  ICFPAGE  =  octal  nvunber 
option  on  the  TRICOMP  control  card  for  only  the  current  program. 

37.  TMPMAX  N  -  This  is  the  saune  as  the  TMPMAX  =  octal  number 
option  on  the  TRICOMP  control  card  for  only  the  current  prograun. 

38.  OWNER  N  -  This  is  the  same  as  the  OWNER  =  octal  number 
option  on  the  TRICOMP  control  card  for  only  the  current  program. 

39.  INSBR  N  -  This  is  the  same  as  the  INSBR  =  octal  number 
option  on  the  TRICOMP  control  card  for  only  the  current  program. 

40.  CONBR  N  -  This  is  the  same  as  the  CONBR  =  octal  number 
option  on  the  TRICOMP  control  card  for  only  the  current  program. 
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